package Data::Semantic::Net::IPAddress::TestData::IPv4;

use strict;
use warnings;


our $VERSION = '0.02';


use constant TESTDATA => (
    {
        args => {},
        valid => [ qw(
            127.0.0.1
            131.130.249.31
            10.0.1.3
            192.168.1.3
        ) ],
        invalid => [ qw(
            127.0
        ) ],
    },
    {
        args => { forbid_internal => 1 },
        valid => [ qw(
            131.130.249.31
        ) ],
        invalid => [ qw(
            127.0
            127.0.0.1
            10.0.1.3
            192.168.1.3
        ) ],
    },
);


1;


__END__

{% PROCESS complete/semantic_testdata %}
